foo=:[: */ 1: + [: +/"1 =@q:


{.(500 < foo"0 t)#t=:+/\>: i.13000 